rm(list=ls())
knitr::opts_chunk$set(echo = TRUE)
#packages <- c("knitr", "stats", "dplyr","rmarkdown","tibble", "data.table","tidyr", "ggridges", "ggplot2", "anytime", "stringr", "patchwork")
#packages
packages <- c("tidyr","tidyverse","dplyr", "knitr", "rmarkdown","anytime")
#install.packages(packages, dependencies = TRUE)
if(!require(rmdformats)) install.packages('rmdformats'); require(rmdformats)
if(!require(gridExtra)) install.packages('gridExtra'); require(gridExtra)
#install.packages('rmdformats')
invisible(lapply(packages, library, character.only = TRUE))
#directory - R_code
print(dirname(rstudioapi::getActiveDocumentContext()$path))
setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
source("./Plot_lib.R")
source("./R_function.R")
return_CName_chr<-function(df1, Tag){
for (i in 1:NCOL(df1)){
if (df1[i]==Tag){
return(names(df1)[i])
}
}
}
## Global options
options(max.print="75")
opts_chunk$set(echo=FALSE,
cache=TRUE,
prompt=FALSE,
tidy=TRUE,
comment=NA,
message=FALSE,
warning=FALSE)
opts_knit$set(width=75)
getwd()
1.Data_Load
1-1.연소이력&Tag Data
[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/0.Data"
1-2.연소 분Data
[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/2.RSC"
[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/2.RSC"
[1] "N-3_RG-110E" "N-3_RG-110H" "N-3_RG-110Q" "N-3_RG-110S" "N-3_RG-110U"
[6] "N-3_RG-110Y" "N-3_RH-110AB" "N-3_RH-110R" "N-3_RI-110A" "N-3_RI-110AA"
[11] "N-3_RI-110AC" "N-3_RI-110C" "N-3_RI-110D" "N-3_RI-110H" "N-3_RI-110M"
[16] "N-3_RI-110N" "N-3_RI-110Q" "N-3_RI-110U" "N-3_RJ-110E" "N-3_RJ-110F"
[21] "N-3_RJ-110H" "N-3_RJ-110J" "N-3_RJ-110K" "N-3_RJ-110M" "N-3_RJ-110O"
[26] "N-3_RJ-110R" "N-3_RJ-110V" "N-3_RJ-110W" "N-3_RJ-110Y"
2.Preprocessing
연소 건수
G-E 의 연소 건수 1 건
G-H 의 연소 건수 3 건
G-Q 의 연소 건수 5 건
G-S 의 연소 건수 3 건
G-U 의 연소 건수 2 건
G-Y 의 연소 건수 1 건
H-AB 의 연소 건수 4 건
H-R 의 연소 건수 1 건
I-A 의 연소 건수 1 건
I-AA 의 연소 건수 5 건
I-AC 의 연소 건수 0 건
I-C 의 연소 건수 1 건
I-D 의 연소 건수 3 건
I-H 의 연소 건수 4 건
I-M 의 연소 건수 3 건
I-N 의 연소 건수 5 건
I-Q 의 연소 건수 2 건
I-U 의 연소 건수 2 건
J-E 의 연소 건수 1 건
J-F 의 연소 건수 2 건
J-H 의 연소 건수 2 건
J-J 의 연소 건수 1 건
J-K 의 연소 건수 4 건
J-M 의 연소 건수 5 건
J-O 의 연소 건수 1 건
J-R 의 연소 건수 4 건
J-V 의 연소 건수 10 건
J-W 의 연소 건수 3 건
J-Y 의 연소 건수 2 건
[1] 81
3.탐색적 자료 분석(Exploratory data analysis)
3-1 G-E cell
G-E 의 연소 건수 1 건
연소발생일 : 2020-05-02 0:08

